PC World Komputer 2007 December/PCWKCD1207B.iso/Faktury Express 5.94 PL - pelna wersja specjalna/setup.exe/{app}/Import.exe/0/RCDATA/TFORM_MAIN/TFORM_MAIN.txt

Text File | 2006-05-30 | 27KB | 1,131 lines

object Form_Main: TForm_Main
  Left = 253
  Top = 156
  Width = 512
  Height = 459
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = 'Import danych'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 70
    Width = 126
    Height = 13
    Caption = 'Faktury Express wersja 3,4'
  end
  object Label2: TLabel
    Left = 16
    Top = 100
    Width = 117
    Height = 13
    Caption = 'Faktury Express wersja 5'
  end
  object ED_Dir1: TEdit
    Left = 152
    Top = 66
    Width = 217
    Height = 21
    TabOrder = 0
  end
  object ED_Dir2: TEdit
    Left = 152
    Top = 98
    Width = 217
    Height = 21
    TabOrder = 1
  end
  object btnDir1: TButton
    Left = 384
    Top = 64
    Width = 105
    Height = 25
    Caption = 'Wybierz katalog...'
    TabOrder = 2
    OnClick = btnDir1Click
  end
  object btnDir2: TButton
    Left = 384
    Top = 96
    Width = 105
    Height = 25
    Caption = 'Wybierz katalog...'
    TabOrder = 3
    OnClick = btnDir2Click
  end
  object btnStart: TButton
    Left = 272
    Top = 192
    Width = 105
    Height = 25
    Caption = 'Start'
    TabOrder = 4
    OnClick = btnStartClick
  end
  object btnZamknij: TButton
    Left = 384
    Top = 192
    Width = 105
    Height = 25
    Caption = 'Zamknij'
    TabOrder = 5
    OnClick = btnZamknijClick
  end
  object GroupBox1: TGroupBox
    Left = 16
    Top = 128
    Width = 473
    Height = 57
    Caption = 'Tabele'
    TabOrder = 6
    object checkTowary: TCheckBox
      Left = 160
      Top = 16
      Width = 65
      Height = 17
      Caption = 'Towary'
      TabOrder = 0
    end
    object checkKontrahenci: TCheckBox
      Left = 8
      Top = 32
      Width = 81
      Height = 17
      Caption = 'Kontrahenci'
      TabOrder = 1
    end
    object checkSprzedawcy: TCheckBox
      Left = 8
      Top = 16
      Width = 145
      Height = 17
      Caption = 'Sprzedawcy (+numeracje)'
      TabOrder = 2
    end
    object checkFaktury: TCheckBox
      Left = 224
      Top = 16
      Width = 65
      Height = 17
      Caption = 'Faktury'
      TabOrder = 3
    end
    object checkFExpo: TCheckBox
      Left = 336
      Top = 16
      Width = 113
      Height = 17
      Caption = 'Faktury exportowe'
      TabOrder = 4
    end
    object checkFKoryg: TCheckBox
      Left = 224
      Top = 32
      Width = 121
      Height = 17
      Caption = 'Faktury koryguj�ce'
      TabOrder = 5
    end
    object checkNoty: TCheckBox
      Left = 336
      Top = 32
      Width = 97
      Height = 17
      Caption = 'Noty koryguj�ce'
      TabOrder = 6
    end
    object checkNotes: TCheckBox
      Left = 160
      Top = 32
      Width = 65
      Height = 17
      Caption = 'Notatki'
      TabOrder = 7
    end
  end
  object btnPomoc: TButton
    Left = 160
    Top = 192
    Width = 105
    Height = 25
    Caption = 'Pomoc'
    TabOrder = 7
    OnClick = btnPomocClick
  end
  object ProgressBar: TProgressBar
    Left = 0
    Top = 416
    Width = 504
    Height = 16
    Align = alBottom
    Min = 0
    Max = 100
    TabOrder = 8
  end
  object Memo: TMemo
    Left = 16
    Top = 232
    Width = 473
    Height = 169
    TabOrder = 9
  end
  object GB_Wersja: TGroupBox
    Left = 16
    Top = 8
    Width = 473
    Height = 49
    Caption = 'Wybierz wersj� z kt�rej chcesz przekopiowa� dane'
    TabOrder = 10
    object RB_Wersja_3: TRadioButton
      Left = 128
      Top = 22
      Width = 73
      Height = 17
      Caption = 'Wersja 3'
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = RB_Wersja_3Click
    end
    object RB_Wersja_4: TRadioButton
      Left = 248
      Top = 22
      Width = 65
      Height = 17
      Caption = 'Wersja 4'
      TabOrder = 1
      OnClick = RB_Wersja_4Click
    end
  end
  object old_Towary: TTable
    TableName = 'old\Towary.db'
    Left = 24
    Top = 240
  end
  object old_Kontrahenci: TTable
    TableName = 'old\Kontrahenci.db'
    Left = 88
    Top = 240
  end
  object old_Sprzedawcy: TTable
    TableName = 'old\Sprzedawcy.db'
    Left = 120
    Top = 240
  end
  object new_Towary: TTable
    TableName = 'new\Towary.db'
    Left = 24
    Top = 288
    object new_TowaryIdent: TStringField
      FieldName = 'Ident'
      Size = 100
    end
    object new_TowaryNazwa: TStringField
      FieldName = 'Nazwa'
      Size = 250
    end
    object new_TowaryNetto: TFloatField
      FieldName = 'Netto'
    end
    object new_TowaryBrutto: TFloatField
      FieldName = 'Brutto'
    end
    object new_TowaryJm: TStringField
      FieldName = 'Jm'
      Size = 10
    end
    object new_TowaryKod: TStringField
      FieldName = 'Kod'
      Size = 100
    end
    object new_TowaryOpis: TStringField
      FieldName = 'Opis'
      Size = 250
    end
    object new_TowaryPKWiU: TStringField
      FieldName = 'PKWiU'
    end
    object new_TowaryKlasa: TStringField
      FieldName = 'Klasa'
      Size = 10
    end
    object new_TowaryMagazyn: TFloatField
      FieldName = 'Magazyn'
    end
    object new_TowaryNr: TIntegerField
      FieldName = 'Nr'
    end
    object new_TowaryMinimum: TFloatField
      FieldName = 'Minimum'
    end
    object new_TowaryVAT: TStringField
      FieldName = 'VAT'
      Size = 3
    end
  end
  object new_Kontrahenci: TTable
    TableName = 'new\Kontrahenci.db'
    Left = 88
    Top = 288
    object new_KontrahenciIdent: TStringField
      FieldName = 'Ident'
      Size = 100
    end
    object new_KontrahenciNr: TIntegerField
      FieldName = 'Nr'
    end
    object new_KontrahenciNazwisko: TStringField
      FieldName = 'Nazwisko'
      Size = 50
    end
    object new_KontrahenciFirma: TStringField
      FieldName = 'Firma'
      Size = 250
    end
    object new_KontrahenciUlica: TStringField
      FieldName = 'Ulica'
      Size = 50
    end
    object new_KontrahenciMiejscowosc: TStringField
      FieldName = 'Miejscowosc'
      Size = 30
    end
    object new_KontrahenciKod: TStringField
      FieldName = 'Kod'
      Size = 10
    end
    object new_KontrahenciTelefon: TStringField
      FieldName = 'Telefon'
      Size = 35
    end
    object new_KontrahenciFaks: TStringField
      FieldName = 'Faks'
      Size = 35
    end
    object new_KontrahenciEmail: TStringField
      FieldName = 'Email'
      Size = 50
    end
    object new_KontrahenciGG: TStringField
      FieldName = 'GG'
      Size = 10
    end
    object new_KontrahenciNIP: TStringField
      FieldName = 'NIP'
      Size = 30
    end
    object new_KontrahenciREGON: TStringField
      FieldName = 'REGON'
      Size = 30
    end
    object new_KontrahenciBank: TStringField
      FieldName = 'Bank'
      Size = 50
    end
    object new_KontrahenciNr_rku1: TStringField
      FieldName = 'Nr_rku1'
      Size = 2
    end
    object new_KontrahenciNr_rku2: TStringField
      FieldName = 'Nr_rku2'
      Size = 8
    end
    object new_KontrahenciNr_rku3: TStringField
      FieldName = 'Nr_rku3'
      Size = 100
    end
    object new_KontrahenciRabat: TIntegerField
      FieldName = 'Rabat'
    end
    object new_KontrahenciUwagi: TStringField
      FieldName = 'Uwagi'
      Size = 250
    end
    object new_KontrahenciKraj: TStringField
      FieldName = 'Kraj'
      Size = 100
    end
    object new_KontrahenciNr_rej: TStringField
      FieldName = 'Nr_rej'
    end
    object new_KontrahenciUsuniety: TBooleanField
      FieldName = 'Usuniety'
    end
  end
  object new_Sprzedawcy: TTable
    TableName = 'new\Sprzedawcy.db'
    Left = 120
    Top = 288
    object new_SprzedawcyIdent: TStringField
      FieldName = 'Ident'
      Size = 100
    end
    object new_SprzedawcyId_numeracji: TStringField
      FieldName = 'Id_numeracji'
      Size = 30
    end
    object new_SprzedawcyNazwisko: TStringField
      FieldName = 'Nazwisko'
      Size = 50
    end
    object new_SprzedawcyFirma: TStringField
      FieldName = 'Firma'
      Size = 250
    end
    object new_SprzedawcyUlica: TStringField
      FieldName = 'Ulica'
      Size = 50
    end
    object new_SprzedawcyMiejscowosc: TStringField
      FieldName = 'Miejscowosc'
      Size = 30
    end
    object new_SprzedawcyKod: TStringField
      FieldName = 'Kod'
      Size = 10
    end
    object new_SprzedawcyTelefon: TStringField
      FieldName = 'Telefon'
      Size = 35
    end
    object new_SprzedawcyFaks: TStringField
      FieldName = 'Faks'
      Size = 35
    end
    object new_SprzedawcyEmail: TStringField
      FieldName = 'Email'
      Size = 50
    end
    object new_SprzedawcyGG: TStringField
      FieldName = 'GG'
      Size = 10
    end
    object new_SprzedawcyNIP: TStringField
      FieldName = 'NIP'
      Size = 30
    end
    object new_SprzedawcyREGON: TStringField
      FieldName = 'REGON'
      Size = 30
    end
    object new_SprzedawcyBank: TStringField
      FieldName = 'Bank'
      Size = 50
    end
    object new_SprzedawcyNr_rku1: TStringField
      FieldName = 'Nr_rku1'
      Size = 2
    end
    object new_SprzedawcyNr_rku2: TStringField
      FieldName = 'Nr_rku2'
      Size = 8
    end
    object new_SprzedawcyNr_rku3: TStringField
      FieldName = 'Nr_rku3'
      Size = 100
    end
    object new_SprzedawcyNr_dowodu: TStringField
      FieldName = 'Nr_dowodu'
      Size = 11
    end
    object new_SprzedawcyDowod_Data: TDateField
      FieldName = 'Dowod_Data'
    end
    object new_SprzedawcyDowod_Wydawca: TStringField
      FieldName = 'Dowod_Wydawca'
      Size = 100
    end
    object new_SprzedawcySiedlisko: TStringField
      FieldName = 'Siedlisko'
    end
    object new_SprzedawcyNr: TIntegerField
      FieldName = 'Nr'
    end
  end
  object old_Faktury: TTable
    TableName = 'old\wyst_faktury.db'
    Left = 152
    Top = 240
  end
  object new_Faktury: TTable
    TableName = 'new\Faktury.db'
    Left = 152
    Top = 288
    object new_FakturyNr_faktury: TStringField
      FieldName = 'Nr_faktury'
      Size = 25
    end
    object new_FakturyId_sprzedawcy: TStringField
      FieldName = 'Id_sprzedawcy'
      Size = 100
    end
    object new_FakturyId_kontrahenta: TStringField
      FieldName = 'Id_kontrahenta'
      Size = 100
    end
    object new_FakturyRodzaj: TIntegerField
      FieldName = 'Rodzaj'
    end
    object new_FakturyData_wyst: TDateField
      FieldName = 'Data_wyst'
    end
    object new_FakturyData_pl: TDateField
      FieldName = 'Data_pl'
    end
    object new_FakturyForma_pl: TStringField
      FieldName = 'Forma_pl'
    end
    object new_FakturyNetto: TFloatField
      FieldName = 'Netto'
    end
    object new_FakturyWartoscVAT: TFloatField
      FieldName = 'WartoscVAT'
    end
    object new_FakturyBrutto: TFloatField
      FieldName = 'Brutto'
    end
    object new_FakturyData_sp: TDateField
      FieldName = 'Data_sp'
    end
    object new_FakturyTermin_pl: TStringField
      FieldName = 'Termin_pl'
    end
    object new_FakturyZamowienie: TStringField
      FieldName = 'Zamowienie'
    end
    object new_FakturySp_wysylki: TStringField
      FieldName = 'Sp_wysylki'
    end
    object new_FakturyMies_sp: TIntegerField
      FieldName = 'Mies_sp'
    end
    object new_FakturyRodz_wy: TIntegerField
      FieldName = 'Rodz_wy'
    end
    object new_FakturyRabat: TIntegerField
      FieldName = 'Rabat'
    end
    object new_FakturyZaplacona: TBooleanField
      FieldName = 'Zaplacona'
    end
    object new_FakturyNumerFakt: TIntegerField
      FieldName = 'NumerFakt'
    end
    object new_FakturyWplacono: TFloatField
      FieldName = 'Wplacono'
    end
    object new_FakturyPozostalo: TFloatField
      FieldName = 'Pozostalo'
    end
    object new_FakturyMiejsce_wyst: TStringField
      FieldName = 'Miejsce_wyst'
    end
    object new_FakturyWaluta: TStringField
      FieldName = 'Waluta'
      Size = 10
    end
    object new_FakturyKurs: TFloatField
      FieldName = 'Kurs'
    end
    object new_FakturyRodz_fa: TIntegerField
      FieldName = 'Rodz_fa'
    end
    object new_FakturyUwagi: TStringField
      FieldName = 'Uwagi'
      Size = 100
    end
  end
  object old_Pozycje: TTable
    TableName = 'old\wyst_pozycje.db'
    Left = 184
    Top = 240
  end
  object new_Pozycje: TTable
    TableName = 'new\Wyst_pozycje.db'
    Left = 184
    Top = 288
    object new_PozycjeNr_faktury: TStringField
      FieldName = 'Nr_faktury'
      Size = 25
    end
    object new_PozycjeLp: TIntegerField
      FieldName = 'Lp'
    end
    object new_PozycjeNazwa: TStringField
      FieldName = 'Nazwa'
      Size = 250
    end
    object new_PozycjeIlosc: TFloatField
      FieldName = 'Ilosc'
    end
    object new_PozycjeVAT: TStringField
      FieldName = 'VAT'
      Size = 3
    end
    object new_PozycjeJm: TStringField
      FieldName = 'Jm'
      Size = 10
    end
    object new_PozycjeNetto: TFloatField
      FieldName = 'Netto'
    end
    object new_PozycjeKwotaVAT: TFloatField
      FieldName = 'KwotaVAT'
    end
    object new_PozycjeBrutto: TFloatField
      FieldName = 'Brutto'
    end
    object new_PozycjeNetto_jedn: TFloatField
      FieldName = 'Netto_jedn'
    end
    object new_PozycjePKWiU: TStringField
      FieldName = 'PKWiU'
    end
    object new_PozycjeKlasa: TStringField
      FieldName = 'Klasa'
      Size = 10
    end
    object new_PozycjeRabatPr: TFloatField
      FieldName = 'RabatPr'
    end
    object new_PozycjeWydano: TBooleanField
      FieldName = 'Wydano'
    end
  end
  object Query1: TQuery
    DataSource = DataSource1
    SQL.Strings = (
      'select * from old_sprzedawcy')
    Left = 56
    Top = 192
  end
  object DataSource1: TDataSource
    DataSet = new_Sprzedawcy
    Left = 96
    Top = 192
  end
  object old_Numeracje: TTable
    TableName = 'old\Numeracje.db'
    Left = 56
    Top = 240
  end
  object new_Numeracje: TTable
    TableName = 'new\Numeracje.db'
    Left = 56
    Top = 288
    object new_NumeracjeId_numeracji: TStringField
      FieldName = 'Id_numeracji'
      Size = 30
    end
    object new_NumeracjeFormat: TStringField
      FieldName = 'Format'
      Size = 30
    end
    object new_NumeracjeAktualny_numer: TStringField
      FieldName = 'Aktualny_numer'
      Size = 30
    end
    object new_NumeracjeNrFakturyExpo: TIntegerField
      FieldName = 'NrFakturyExpo'
    end
    object new_NumeracjeNrFakturyWew: TIntegerField
      FieldName = 'NrFakturyWew'
    end
    object new_NumeracjeNrFakturyZal: TIntegerField
      FieldName = 'NrFakturyZal'
    end
    object new_NumeracjeNrFakturyPr: TIntegerField
      FieldName = 'NrFakturyPr'
    end
    object new_NumeracjeNrFakturyKor: TIntegerField
      FieldName = 'NrFakturyKor'
    end
    object new_NumeracjeNrNotyKor: TIntegerField
      FieldName = 'NrNotyKor'
    end
  end
  object old_Notes: TTable
    IndexDefs = <
      item
        Name = 'NotesIndex1'
        Fields = 'data'
        Options = [ixPrimary, ixUnique]
      end>
    StoreDefs = True
    TableName = 'old\Notes.db'
    Left = 216
    Top = 240
  end
  object new_Notes: TTable
    IndexDefs = <
      item
        Name = 'NotesIndex1'
        Fields = 'data'
        Options = [ixPrimary, ixUnique]
      end>
    StoreDefs = True
    TableName = 'new\Notes.db'
    Left = 216
    Top = 288
    object DateField1: TDateField
      FieldName = 'data'
      Required = True
    end
    object MemoField1: TMemoField
      FieldName = 'pn'
      BlobType = ftMemo
      Size = 1
    end
    object MemoField2: TMemoField
      FieldName = 'wt'
      BlobType = ftMemo
      Size = 1
    end
    object MemoField3: TMemoField
      FieldName = 'sr'
      BlobType = ftMemo
      Size = 1
    end
    object MemoField4: TMemoField
      FieldName = 'cz'
      BlobType = ftMemo
      Size = 1
    end
    object MemoField5: TMemoField
      FieldName = 'pt'
      BlobType = ftMemo
      Size = 1
    end
    object MemoField6: TMemoField
      FieldName = 'so'
      BlobType = ftMemo
      Size = 1
    end
    object MemoField7: TMemoField
      FieldName = 'nd'
      BlobType = ftMemo
      Size = 1
    end
  end
  object old_Noty: TTable
    TableName = 'old\Noty.db'
    Left = 248
    Top = 240
  end
  object new_Noty: TTable
    TableName = 'new\Faktury_noty.db'
    Left = 248
    Top = 288
    object new_NotyNr_noty: TStringField
      FieldName = 'Nr_noty'
      Size = 25
    end
    object new_NotyData_wyst: TDateField
      FieldName = 'Data_wyst'
    end
    object new_NotyTrescPrzed: TStringField
      FieldName = 'TrescPrzed'
      Size = 250
    end
    object new_NotyTrescPo: TStringField
      FieldName = 'TrescPo'
      Size = 250
    end
    object new_NotyNr_faktury: TStringField
      FieldName = 'Nr_faktury'
      Size = 25
    end
  end
  object old_Faktury_expo: TTable
    TableName = 'old\wyst_faktury_expo.db'
    Left = 280
    Top = 240
  end
  object new_Faktury_expo: TTable
    TableName = 'new\Faktury_expo.db'
    Left = 280
    Top = 288
    object new_Faktury_expoNr_f_expo: TStringField
      FieldName = 'Nr_f_expo'
      Size = 25
    end
    object new_Faktury_expoId_sprzedawcy: TStringField
      FieldName = 'Id_sprzedawcy'
      Size = 100
    end
    object new_Faktury_expoId_kontrahenta: TStringField
      FieldName = 'Id_kontrahenta'
      Size = 100
    end
    object new_Faktury_expoId_odbiorcy: TStringField
      FieldName = 'Id_odbiorcy'
      Size = 100
    end
    object new_Faktury_expoData_wyst: TDateField
      FieldName = 'Data_wyst'
    end
    object new_Faktury_expoWaga: TStringField
      FieldName = 'Waga'
    end
    object new_Faktury_expoMiejsce_wyst: TStringField
      FieldName = 'Miejsce_wyst'
    end
    object new_Faktury_expoWarunki: TStringField
      FieldName = 'Warunki'
      Size = 250
    end
    object new_Faktury_expoNetto: TFloatField
      FieldName = 'Netto'
    end
    object new_Faktury_expoWartoscVAT: TFloatField
      FieldName = 'WartoscVAT'
    end
    object new_Faktury_expoBrutto: TFloatField
      FieldName = 'Brutto'
    end
    object new_Faktury_expoWaluta: TStringField
      FieldName = 'Waluta'
      Size = 10
    end
  end
  object old_Pozycje_expo: TTable
    TableName = 'old\wyst_poz_expo.db'
    Left = 312
    Top = 240
  end
  object new_Pozycje_expo: TTable
    TableName = 'new\wyst_pozycje_expo.db'
    Left = 312
    Top = 288
    object new_Pozycje_expoNr_f_expo: TStringField
      FieldName = 'Nr_f_expo'
      Size = 25
    end
    object new_Pozycje_expoLp: TIntegerField
      FieldName = 'Lp'
    end
    object new_Pozycje_expoNazwa: TStringField
      FieldName = 'Nazwa'
      Size = 250
    end
    object new_Pozycje_expoIlosc: TFloatField
      FieldName = 'Ilosc'
    end
    object new_Pozycje_expoVAT: TStringField
      FieldName = 'VAT'
      Size = 3
    end
    object new_Pozycje_expoJm: TStringField
      FieldName = 'Jm'
      Size = 10
    end
    object new_Pozycje_expoNetto: TFloatField
      FieldName = 'Netto'
    end
    object new_Pozycje_expoNetto_jedn: TFloatField
      FieldName = 'Netto_jedn'
    end
    object new_Pozycje_expoKwotaVAT: TFloatField
      FieldName = 'KwotaVAT'
    end
    object new_Pozycje_expoBrutto: TFloatField
      FieldName = 'Brutto'
    end
    object new_Pozycje_expoKodTaryfy: TStringField
      FieldName = 'KodTaryfy'
    end
    object new_Pozycje_expoKraj: TStringField
      FieldName = 'Kraj'
    end
  end
  object old_Faktury_koryg: TTable
    TableName = 'old\wyst_faktury_kor.db'
    Left = 344
    Top = 240
  end
  object old_Pozycje_koryg: TTable
    TableName = 'old\wyst_pozycje_kor.db'
    Left = 376
    Top = 240
  end
  object new_Faktury_koryg: TTable
    TableName = 'new\Faktury_koryg.db'
    Left = 344
    Top = 288
    object new_Faktury_korygNr_f_koryg: TStringField
      FieldName = 'Nr_f_koryg'
      Size = 25
    end
    object new_Faktury_korygData_wyst: TDateField
      FieldName = 'Data_wyst'
    end
    object new_Faktury_korygData_pl: TDateField
      FieldName = 'Data_pl'
    end
    object new_Faktury_korygForma_pl: TStringField
      FieldName = 'Forma_pl'
    end
    object new_Faktury_korygNetto: TFloatField
      FieldName = 'Netto'
    end
    object new_Faktury_korygWartoscVAT: TFloatField
      FieldName = 'WartoscVAT'
    end
    object new_Faktury_korygBrutto: TFloatField
      FieldName = 'Brutto'
    end
    object new_Faktury_korygRodzaj_kor: TStringField
      FieldName = 'Rodzaj_kor'
      Size = 40
    end
    object new_Faktury_korygPrzycz_kor: TStringField
      FieldName = 'Przycz_kor'
      Size = 100
    end
    object new_Faktury_korygNr_faktury: TStringField
      FieldName = 'Nr_faktury'
      Size = 25
    end
  end
  object new_Pozycje_koryg: TTable
    TableName = 'new\Wyst_pozycje_koryg.db'
    Left = 376
    Top = 288
    object new_Pozycje_korygNr_f_koryg: TStringField
      FieldName = 'Nr_f_koryg'
      Size = 25
    end
    object new_Pozycje_korygLp: TIntegerField
      FieldName = 'Lp'
    end
    object new_Pozycje_korygNazwa: TStringField
      FieldName = 'Nazwa'
      Size = 250
    end
    object new_Pozycje_korygIlosc: TFloatField
      FieldName = 'Ilosc'
    end
    object new_Pozycje_korygVAT: TStringField
      FieldName = 'VAT'
      Size = 3
    end
    object new_Pozycje_korygJm: TStringField
      FieldName = 'Jm'
      Size = 10
    end
    object new_Pozycje_korygNetto: TFloatField
      FieldName = 'Netto'
    end
    object new_Pozycje_korygKwotaVAT: TFloatField
      FieldName = 'KwotaVAT'
    end
    object new_Pozycje_korygBrutto: TFloatField
      FieldName = 'Brutto'
    end
    object new_Pozycje_korygNetto_jedn: TFloatField
      FieldName = 'Netto_jedn'
    end
    object new_Pozycje_korygPKWiU: TStringField
      FieldName = 'PKWiU'
    end
    object new_Pozycje_korygKlasa: TStringField
      FieldName = 'Klasa'
      Size = 10
    end
    object new_Pozycje_korygNr_faktury: TStringField
      FieldName = 'Nr_faktury'
      Size = 25
    end
  end
  object old_Sprzedawcy3: TTable
    TableName = '3\Sprzedawcy.db'
    Left = 120
    Top = 264
    object old_Sprzedawcy3Id: TStringField
      FieldName = 'Id'
      Size = 10
    end
    object old_Sprzedawcy3Nr: TIntegerField
      FieldName = 'Nr'
    end
    object old_Sprzedawcy3Nazwisko: TStringField
      FieldName = 'Nazwisko'
      Size = 50
    end
    object old_Sprzedawcy3Firma: TStringField
      FieldName = 'Firma'
      Size = 240
    end
    object old_Sprzedawcy3Ulica: TStringField
      FieldName = 'Ulica'
      Size = 40
    end
    object old_Sprzedawcy3Miejscowosc: TStringField
      FieldName = 'Miejscowosc'
    end
    object old_Sprzedawcy3Kod: TStringField
      FieldName = 'Kod'
      Size = 10
    end
    object old_Sprzedawcy3Telefon: TStringField
      FieldName = 'Telefon'
      Size = 15
    end
    object old_Sprzedawcy3Faks: TStringField
      FieldName = 'Faks'
      Size = 15
    end
    object old_Sprzedawcy3Email: TStringField
      FieldName = 'Email'
      Size = 40
    end
    object old_Sprzedawcy3NIP: TStringField
      FieldName = 'NIP'
      Size = 13
    end
    object old_Sprzedawcy3REGON: TStringField
      FieldName = 'REGON'
      Size = 30
    end
    object old_Sprzedawcy3Bank: TStringField
      FieldName = 'Bank'
      Size = 50
    end
    object old_Sprzedawcy3Nr_rku1: TStringField
      FieldName = 'Nr_rku1'
      Size = 2
    end
    object old_Sprzedawcy3Nr_rku2: TStringField
      FieldName = 'Nr_rku2'
      Size = 8
    end
    object old_Sprzedawcy3Nr_rku3: TStringField
      FieldName = 'Nr_rku3'
      Size = 100
    end
    object old_Sprzedawcy3Nr_dowodu: TStringField
      FieldName = 'Nr_dowodu'
      Size = 11
    end
  end
  object old_Faktury3: TTable
    TableName = '3\wyst_faktury.db'
    Left = 152
    Top = 264
    object old_Faktury3Nr: TStringField
      FieldName = 'Nr'
    end
    object old_Faktury3Nr_sprzed: TIntegerField
      FieldName = 'Nr_sprzed'
    end
    object old_Faktury3Nr_kontr: TIntegerField
      FieldName = 'Nr_kontr'
    end
    object old_Faktury3Rodzaj: TIntegerField
      FieldName = 'Rodzaj'
    end
    object old_Faktury3Data_wyst: TDateField
      FieldName = 'Data_wyst'
    end
    object old_Faktury3Data_pl: TDateField
      FieldName = 'Data_pl'
    end
    object old_Faktury3Forma_pl: TStringField
      FieldName = 'Forma_pl'
    end
    object old_Faktury3Netto: TCurrencyField
      FieldName = 'Netto'
    end
    object old_Faktury3WartoscVAT: TCurrencyField
      FieldName = 'WartoscVAT'
    end
    object old_Faktury3Brutto: TCurrencyField
      FieldName = 'Brutto'
    end
    object old_Faktury3Data_sp: TDateField
      FieldName = 'Data_sp'
    end
    object old_Faktury3Termin_pl: TStringField
      FieldName = 'Termin_pl'
    end
    object old_Faktury3Zamowienie: TStringField
      FieldName = 'Zamowienie'
    end
    object old_Faktury3Sp_wysylki: TStringField
      FieldName = 'Sp_wysylki'
    end
    object old_Faktury3Mies_sp: TIntegerField
      FieldName = 'Mies_sp'
    end
    object old_Faktury3Rodz_fa: TIntegerField
      FieldName = 'Rodz_fa'
    end
    object old_Faktury3Rodz_wy: TIntegerField
      FieldName = 'Rodz_wy'
    end
    object old_Faktury3Rabat: TIntegerField
      FieldName = 'Rabat'
    end
    object old_Faktury3Zaplacona: TBooleanField
      FieldName = 'Zaplacona'
    end
    object old_Faktury3NumerFakt: TIntegerField
      FieldName = 'NumerFakt'
    end
  end
  object old_Pozycje3: TTable
    TableName = '3\wyst_pozycje.db'
    Left = 184
    Top = 264
    object old_Pozycje3Lp: TIntegerField
      FieldName = 'Lp'
    end
    object old_Pozycje3Nazwa: TStringField
      FieldName = 'Nazwa'
      Size = 255
    end
    object old_Pozycje3Ilosc: TFloatField
      FieldName = 'Ilosc'
    end
    object old_Pozycje3VAT: TStringField
      FieldName = 'VAT'
      Size = 3
    end
    object old_Pozycje3Jm: TStringField
      FieldName = 'Jm'
      Size = 10
    end
    object old_Pozycje3Netto: TCurrencyField
      FieldName = 'Netto'
    end
    object old_Pozycje3KwotaVAT: TCurrencyField
      FieldName = 'KwotaVAT'
    end
    object old_Pozycje3Brutto: TCurrencyField
      FieldName = 'Brutto'
    end
    object old_Pozycje3Netto_jedn: TCurrencyField
      FieldName = 'Netto_jedn'
    end
    object old_Pozycje3PKWiU: TStringField
      FieldName = 'PKWiU'
    end
    object old_Pozycje3Klasa: TStringField
      FieldName = 'Klasa'
      Size = 3
    end
    object old_Pozycje3Nr_faktury: TStringField
      FieldName = 'Nr_faktury'
    end
  end
end